This property returns a collection of Category objects representing the detected categories for the active search.
Read-Only Variant property (Categories Collection)
The following example enumerates the categories of the active tab, writing them to a file called "c:\output.txt".
Set FSO = CreateObject("Scripting.FileSystemObject") Set Output = FSO.CreateTextFile("c:\output.txt", True) For Each Category in App.ActiveTab.Categories Output.WriteLine Category.Name & " - " & Category.Count Next